home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / AMIGA / (A)F / (A)F1.ADF / makefont.c < prev    next >
C/C++ Source or Header  |  1986-06-01  |  2KB  |  69 lines
  1. /*********************************************************/
  2. /*                                                       */
  3. /* Program to create micro.font file                     */
  4. /*                                                       */
  5. /* by:Bobby Deen                                         */
  6. /*    629 Winchester Dr.                                 */
  7. /*    Richardson, Texas 75080                            */
  8. /*    Permanent (Home) Phone: (214) 235-4391             */
  9. /*    Temporary (School) Phone: (409) 268-0207           */
  10. /*                                                       */
  11. /*    Please feel free to give this program and          */
  12. /*    associated font to anyone and everyone.  All I     */
  13. /*    ask is that you retain the credits.                */
  14. /*                                                       */
  15. /* This program creates the micro.font header file for   */
  16. /* the very small character set.  Put the file it        */
  17. /* generates on workbench:fonts/micro.font               */
  18. /* You then assemble the microfnt.asm file and put it    */
  19. /* in workbench:fonts/micro/6                            */
  20. /* See ROM Kernel manual (V1.1) p. 2-202 for more        */
  21. /* details.                                              */
  22. /*                                                       */
  23. /*********************************************************/
  24.  
  25. #include <fcntl.h>
  26.  
  27. main()
  28. {
  29. int   file;
  30. short   int   word;     /* Kludgy but quick 2-byte buffer */
  31. int   status, i;
  32. char  name[256];
  33.  
  34. file = creat ("micro.font", O_WRONLY);
  35.  
  36. word = 0x0F00;
  37. status = write (file, &word, 2);
  38. if (status != 2)
  39.    exit(100);
  40.  
  41. word = 0x0001;
  42. status = write (file, &word, 2);
  43. if (status != 2)
  44.    exit(101);
  45.  
  46. for (i=0; i<256; i++)
  47.    name[i] = '\0';
  48.  
  49. strcpy (name, "micro/6");
  50.  
  51. status = write (file, name, 256);
  52. if (status != 256)
  53.    exit(102);
  54.  
  55. word = 0x0006;
  56. status = write (file, &word, 2);
  57. if (status != 2)
  58.    exit(103);
  59.  
  60. word = 0x0060;
  61. status = write (file, &word, 2);
  62. if (status != 2)
  63.    exit(104);
  64.  
  65. status = close(file);
  66. if (status)
  67.    exit(105);
  68.  
  69. }